home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 April / EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso / EARCD / comm / misc / zpoint_3_14.lha / zpoint-3.14 / Scripts / ImportPrepacked < prev    next >
AmigaDOS Script File  |  1995-10-27  |  2KB  |  57 lines
  1. .key INARC/A,REXXPORT
  2. .bra {
  3. .ket }
  4. .def REXXPORT ZPoint
  5.  
  6. ; $VER: ImportPrepacked 1.0 (27.10.95) Copyright (c) Ralph Seichter
  7. ;
  8. ; Dies ist ein Skript für "Zodiac's Point" Release 3.11, mit dessen Hilfe
  9. ; man vorgepackte Datenpuffer auch unter Speicherknappheit sicherer ein-
  10. ; sortieren kann. Ein Empfangsarchiv wird ausgepackt und ein temporäres
  11. ; ARexx-Skript wird zwecks Datenimport generiert und ausgeführt.
  12. ;
  13. ; INSTALLATION
  14. ;
  15. ; Zunächst schalten Sie die Option "Automatisches Einsortieren nach dem
  16. ; Netcall" ab und speichern die ZP-Konfiguration. Tragen Sie dieses Skript
  17. ; *NICHT* als Entpacker-Kommando ein, da es zum manuellen Aufruf entworfen
  18. ; wurde. Als nächstes passen Sie die Einträge 'tempdir' und 'arctool' an
  19. ; Ihre Bedürfnisse an. Beachten Sie, daß der hinter 'tempdir' angegebene
  20. ; Verzeichnisname mit ':' oder '/' enden muß!
  21.  
  22. set tempdir T:    ; set tempdir dh1:viel/freier/platz/
  23. set arctool LZX   ; set arctool LhA
  24.  
  25. ; BENUTZUNG
  26. ;
  27. ; Bevor Sie dieses Skript starten, *MUSS* sich ZP im Hauptmenü befinden,
  28. ; damit die ARexx-Kommandos interpretiert werden können. Als Parameter sind
  29. ; dem Skript der Name des zu bearbeitenden Empfangsarchives sowie der Name
  30. ; des ZP-ARexx-Ports zu übergeben. Letztere Angabe ist optional, falls Sie
  31. ; nichts angeben wird "ZPoint" als Standardbelegung verwendet. Der eigent-
  32. ; liche Aufruf erfolgt dann aus einer Shell heraus, z.B. mittels
  33. ;
  34. ;    execute ImportPrepacked dh1:zpoint/out.pre ZPoint
  35. ;
  36. ; Wenn Sie den ARexx-Port angeben, denken Sie daran, daß zwischen Groß- und
  37. ; Kleinschreibung unterschieden wird!
  38.  
  39. set dstdir $tempdir$process-ImportPrepacked
  40. set script T:ImportPrepacked-$process.rexx
  41. if exists $dstdir
  42.    delete $dstdir all
  43. endif
  44. makedir $dstdir
  45. $arctool x {INARC} $dstdir/
  46. echo "/** DO NOT EDIT! **/*noptions results*naddress *"{REXXPORT}*"" >$script
  47. list $dstdir lformat "import *"%p%n*"*naddress command 'delete *"%p%n*"'" >>$script
  48. echo "address command 'delete $dstdir all'" >>$script
  49. sys:rexxc/rx $script
  50. delete $script quiet
  51. unset tempdir
  52. unset arctool
  53. unset dstdir
  54. unset script
  55.  
  56. ; EOF
  57.